Chip 1998 May/CHIP Turkiye Mayıs 1998.iso/grafik/dim3try.exe/DIM3TRY/ARCHIVE.Z/ADRes.dll/TEXT/256

Text File | 1997-04-15 | 23.4 KB | 1,681 lines

%%BeginResource: procset Adobe_packedarray 2.0 0
%%Title: (Packed Array Operators)
%%Version: 2.0
%%CreationDate: (8/2/90) ()
%%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
userdict /Adobe_packedarray 5 dict dup begin put
/initialize
{
/packedarray where
    {
    pop
    }
    {
    Adobe_packedarray begin
    Adobe_packedarray
        {
        dup xcheck
            {
            bind
            } if
        userdict 3 1 roll put
        } forall
 end
    } ifelse
} def
/terminate
{
} def
/packedarray
{
array astore readonly
} def
/setpacking
{
pop
} def
/currentpacking
{
false
} def
currentdict readonly pop end
%%EndResource
Adobe_packedarray /initialize get exec
%%BeginResource: procset Adobe_cmykcolor 1.1 0
%%Title: (CMYK Color Operators)
%%Version: 1.1
%%CreationDate: (1/23/89) ()
%%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
currentpacking true setpacking
userdict /Adobe_cmykcolor 4 dict dup begin put
/initialize
{
/setcmykcolor where
    {
    pop
    }
    {
    userdict /Adobe_cmykcolor_vars 2 dict dup begin put
    /_setrgbcolor
        /setrgbcolor load def
    /_currentrgbcolor
        /currentrgbcolor load def
    Adobe_cmykcolor begin
    Adobe_cmykcolor
        {
        dup xcheck
            {
            bind
            } if
        pop pop
        } forall
 end
 end
    Adobe_cmykcolor begin
    } ifelse
} def
/terminate
{
currentdict Adobe_cmykcolor eq
    {
 end
    } if
} def
/setcmykcolor
{
1 sub 4 1 roll
3
    {
    3 index add neg dup 0 lt
        {
        pop 0
        } if
    3 1 roll
    } repeat
Adobe_cmykcolor_vars /_setrgbcolor get exec
pop
} def
/currentcmykcolor
{
Adobe_cmykcolor_vars /_currentrgbcolor get exec
3
    {
    1 sub neg 3 1 roll
    } repeat
0
} def
currentdict readonly pop end
setpacking
%%EndResource
%%BeginResource: procset Adobe_cshow 1.1 0
%%Title: (cshow Operator)
%%Version: 1.1
%%CreationDate: (1/23/89) ()
%%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
currentpacking true setpacking
userdict /Adobe_cshow 3 dict dup begin put
/initialize
{
/cshow where
    {
    pop
    }
    {
    userdict /Adobe_cshow_vars 1 dict dup begin put
    /_cshow
        {} def
    Adobe_cshow begin
    Adobe_cshow
        {
        dup xcheck
            {
            bind
            } if
        userdict 3 1 roll put
        } forall
 end
 end
    } ifelse
} def
/terminate
{
} def
/cshow
{
exch
Adobe_cshow_vars
    exch /_cshow
    exch put
    {
    0 0 Adobe_cshow_vars /_cshow get exec
    } forall
} def
currentdict readonly pop end
setpacking
%%EndResource
%%BeginResource: procset Adobe_customcolor 1.0 0
%%Title: (Custom Color Operators)
%%Version: 1.0
%%CreationDate: (5/9/88) ()
%%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
currentpacking true setpacking
userdict /Adobe_customcolor 5 dict dup begin put
/initialize
{
/setcustomcolor where
    {
    pop
    }
    {
    Adobe_customcolor begin
    Adobe_customcolor
        {
        dup xcheck
            {
            bind
            } if
        pop pop
        } forall
 end
    Adobe_customcolor begin
    } ifelse
} def
/terminate
{
currentdict Adobe_customcolor eq
    {
 end
    } if
} def
/findcmykcustomcolor
{
5 packedarray
}  def
/setcustomcolor
{
exch
aload pop pop
4
    {
    4 index mul 4 1 roll
    } repeat
5 -1 roll pop
setcmykcolor
} def
/setoverprint
{
pop
} def
currentdict readonly pop end
setpacking
%%EndResource
%%BeginResource: procset Adobe_pattern_AI3 1.1 0
%%Title: (Adobe Illustrator (R) Version 3.0 Pattern Operators)
%%Version: 1.1
%%CreationDate: (7/21/89) ()
%%Copyright: ((C) 1987-1990 Adobe Systems Incorporated All Rights Reserved)
currentpacking true setpacking
userdict /Adobe_pattern_AI3 16 dict dup begin put
/initialize
{
/definepattern where
    {
    pop
    }
    {
    Adobe_pattern_AI3 begin
    Adobe_pattern_AI3
        {
        dup xcheck
            {
            bind
            } if
        pop pop
        } forall
    mark
    cachestatus 7 1 roll pop pop pop pop exch pop exch
        {
        {
        10000 add
        dup 2 index gt
            {
            break
            } if
        dup setcachelimit
        } loop
        } stopped
    cleartomark
    } ifelse
} def
/terminate
{
currentdict Adobe_pattern_AI3 eq
    {
 end
    } if
} def
errordict
/nocurrentpoint
{
pop
stop
} put
errordict
/invalidaccess
{
pop
stop
} put
/patternencoding
256 array def
0 1 255
{
patternencoding exch ( ) 2 copy exch 0 exch put cvn put
} for
/definepattern
{
17 dict begin
/uniform exch def
/cache exch def
/key exch def
/procarray exch def
/mtx exch matrix invertmatrix def
/height exch def
/width exch def
/ctm matrix currentmatrix def
/ptm matrix def
/str 32 string def
/slice 9 dict def
slice /s 1 put
slice /q 256 procarray length div sqrt floor cvi put
slice /b 0 put
/FontBBox [0 0 0 0] def
/FontMatrix mtx matrix copy def
/Encoding patternencoding def
/FontType 3 def
/BuildChar
    {
    exch
 begin
    /setstrokeadjust where {pop true setstrokeadjust} if
    slice begin
    dup q dup mul mod s idiv /i exch def
    dup q dup mul mod s mod /j exch def
    q dup mul idiv procarray exch get
    /xl j width s div mul def
    /xg j 1 add width s div mul def
    /yl i height s div mul def
    /yg i 1 add height s div mul def
    uniform
        {
        1 1
        }
        {
        width 0 dtransform
        dup mul exch dup mul add sqrt dup 1 add exch div
        0 height dtransform
        dup mul exch dup mul add sqrt dup 1 add exch div
        } ifelse
    width 0 cache
        {
        xl 4 index mul yl 4 index mul xg 6 index mul yg 6 index mul
        setcachedevice
        }
        {
        setcharwidth
        } ifelse
    gsave
    scale
    newpath
    xl yl moveto
    xg yl lineto
    xg yg lineto
    xl yg lineto
    closepath
    clip
    newpath
 end
 end
    exec
    grestore
    } def
key currentdict definefont
end
} def
/patterncachesize
{
gsave
newpath
0 0 moveto
width 0 lineto
width height lineto
0 height lineto
closepath
patternmatrix setmatrix
pathbbox
exch ceiling 4 -1 roll floor sub 3 1 roll
ceiling exch floor sub
mul 1 add
grestore
} def
/patterncachelimit
{
cachestatus 7 1 roll 6 npop 8 mul
} def
/patternpath
{
exch dup begin setfont
ctm setmatrix
concat
slice exch /b exch slice /q get dup mul mul put
FontMatrix concat
uniform
    {
    width 0 dtransform round width div exch round width div exch
    0 height dtransform round height div exch height div exch
    0 0 transform round exch round exch
    ptm astore setmatrix
    }
    {
    ptm currentmatrix pop
    } ifelse
{currentpoint} stopped not
    {
    2 npop
    pathbbox
    true
    4 index 3 index eq
    4 index 3 index eq
    and
        {
        pop false
            {
            {2 npop}
            {3 npop true}
            {7 npop true}
            {pop true}
            pathforall
            } stopped
            {
            5 npop true
            } if
        } if
        {
        height div ceiling height mul 4 1 roll
        width div ceiling width mul 4 1 roll
        height div floor height mul 4 1 roll
        width div floor width mul 4 1 roll
        2 index sub height div ceiling cvi exch
        3 index sub width div ceiling cvi exch
        4 2 roll moveto
        FontMatrix mtx invertmatrix
        dup dup 4 get exch 5 get rmoveto
        ptm ptm concatmatrix pop
        slice /s
        patterncachesize patterncachelimit div ceiling sqrt ceiling cvi
        dup slice /q get gt
            {
            pop slice /q get
            } if
        put
        0 1 slice /s get dup mul 1 sub
            {
            slice /b get add
            gsave
            0 1 str length 1 sub
                {
                str exch 2 index put
                } for
            pop
            dup
                {
                gsave
                ptm setmatrix
                1 index str length idiv {str show} repeat
                1 index str length mod str exch 0 exch getinterval show
                grestore
                0 height rmoveto
                } repeat
            grestore
            } for
        2 npop
        }
        {
        4 npop
        } ifelse
    } if
end
} def
/patternclip
{
clip
} def
/patternstrokepath
{
strokepath
} def
/patternmatrix
matrix def
/patternfill
{
dup type /dicttype eq
    {
    Adobe_pattern_AI3 /patternmatrix get
    } if
gsave
patternclip
Adobe_pattern_AI3 /patternpath get exec
grestore
newpath
} def
/patternstroke
{
dup type /dicttype eq
    {
    Adobe_pattern_AI3 /patternmatrix get
    } if
gsave
patternstrokepath
true
    {
        {
            {
            newpath
            moveto
            }
            {
            lineto
            }
            {
            curveto
            }
            {
            closepath
            3 copy
            Adobe_pattern_AI3 /patternfill get exec
            } pathforall
        3 npop
        } stopped
            {
            5 npop
            patternclip
            Adobe_pattern_AI3 /patternfill get exec
            } if
    }
    {
    patternclip
    Adobe_pattern_AI3 /patternfill get exec
    } ifelse
grestore
newpath
} def
/patternashow
{
3 index type /dicttype eq
    {
    Adobe_pattern_AI3 /patternmatrix get 4 1 roll
    } if
    {
    2 npop (0) exch
    2 copy 0 exch put pop
    gsave
    false charpath currentpoint
    6 index 6 index 6 index
    Adobe_pattern_AI3 /patternfill get exec
    grestore
    newpath moveto
    2 copy rmoveto
    } exch cshow
5 npop
} def
/patternawidthshow
{
6 index type /dicttype eq
    {
    Adobe_pattern_AI3 /patternmatrix get 7 1 roll
    } if
    {
    2 npop (0) exch
    2 copy 0 exch put
    gsave
    _sp eq {5 index 5 index rmoveto} if
    false charpath currentpoint
    9 index 9 index 9 index
    Adobe_pattern_AI3 /patternfill get exec
    grestore
    newpath moveto
    2 copy rmoveto
    } exch cshow
8 npop
} def
/patternashowstroke
{
4 index type /dicttype eq
    {
    patternmatrix /patternmatrix get 5 1 roll
    } if
4 1 roll
    {
    2 npop (0) exch
    2 copy 0 exch put pop
    gsave
    false charpath
    currentpoint
    4 index setmatrix
    7 index 7 index 7 index
    Adobe_pattern_AI3 /patternstroke get exec
    grestore
    newpath moveto
    2 copy rmoveto
    } exch cshow
6 npop
} def
/patternawidthshowstroke
{
7 index type /dicttype eq
    {
    patternmatrix /patternmatrix get 8 1 roll
    } if
7 1 roll
    {
    2 npop (0) exch
    2 copy 0 exch put
    gsave
    _sp eq {5 index 5 index rmoveto} if
    false charpath currentpoint
    7 index setmatrix
    10 index 10 index 10 index
    Adobe_pattern_AI3 /patternstroke get exec
    grestore
    newpath moveto
    2 copy rmoveto
    } exch cshow
9 npop
} def
currentdict readonly pop end
setpacking
%%EndResource
%%BeginResource: procset Adobe_Illustrator_AI3 1.1 0
%%Title: (Adobe Illustrator (R) Version 3.0 Full Prolog)
%%Version: 1.1
%%CreationDate: (3/7/1994) ()
%%Copyright: ((C) 1987-1994 Adobe Systems Incorporated All Rights Reserved)
currentpacking true setpacking
userdict /Adobe_Illustrator_AI3 71 dict dup begin put
/initialize
{
userdict /Adobe_Illustrator_AI3_vars 67 dict dup begin put
/_lp /none def
/_pf {} def
/_ps {} def
/_psf {} def
/_pss {} def
/_pjsf {} def
/_pjss {} def
/_pola 0 def
/_doClip 0 def
/cf    currentflat def
/_tm matrix def
/_renderStart [/e0 /r0 /a0 /o0 /e1 /r1 /a1 /i0] def
/_renderEnd [null null null null /i1 /i1 /i1 /i1] def
/_render -1 def
/_rise 0 def
/_ax 0 def
/_ay 0 def
/_cx 0 def
/_cy 0 def
/_leading [0 0] def
/_ctm matrix def
/_mtx matrix def
/_sp 16#020 def
/_hyphen (-) def
/_fScl 0 def
/_cnt 0 def
/_hs 1 def
/_nativeEncoding 0 def
/_useNativeEncoding 0 def
/_tempEncode 0 def
/_pntr 0 def
/_tDict 2 dict def
/_wv 0 def
/Tx {} def
/Tj {} def
/CRender {} def
/_AI3_savepage {} def
/_gf null def
/_cf 4 array def
/_if null def
/_of false def
/_fc {} def
/_gs null def
/_cs 4 array def
/_is null def
/_os false def
/_sc {} def
/_pd 1 dict def
/_ed 15 dict def
/_pm matrix def
/_fm null def
/_fd null def
/_fdd null def
/_sm null def
/_sd null def
/_sdd null def
/_i null def
Adobe_Illustrator_AI3 begin
Adobe_Illustrator_AI3 dup /nc get begin
    {
    dup xcheck
        {
        bind
        } if
    pop pop
    } forall
end
end
end
Adobe_Illustrator_AI3 begin
Adobe_Illustrator_AI3_vars begin
newpath
} def
/terminate
{
end
end
} def
/_
null def
/ddef
{
Adobe_Illustrator_AI3_vars 3 1 roll put
} def
/xput
{
dup load dup length exch maxlength eq
    {
    dup dup load dup
    length 2 mul dict copy def
    } if
load begin def end
} def
/npop
{
    {
    pop
    } repeat
} def
/sw
{
dup length exch stringwidth
exch 5 -1 roll 3 index mul add
4 1 roll 3 1 roll mul add
} def
/swj
{
dup 4 1 roll
dup length exch stringwidth
exch 5 -1 roll 3 index mul add
4 1 roll 3 1 roll mul add
6 2 roll /_cnt 0 ddef
{1 index eq {/_cnt _cnt 1 add ddef} if} forall pop
exch _cnt mul exch _cnt mul 2 index add 4 1 roll 2 index add 4 1 roll pop pop
} def
/ss
{
4 1 roll
    {
    2 npop
    (0) exch 2 copy 0 exch put pop
    gsave
    false charpath currentpoint
    4 index setmatrix
    stroke
    grestore
    moveto
    2 copy rmoveto
    } exch cshow
3 npop
} def
/jss
{
4 1 roll
    {
    2 npop
    (0) exch 2 copy 0 exch put
    gsave
    _sp eq
        {
        exch 6 index 6 index 6 index 5 -1 roll widthshow
        currentpoint
        }
        {
        false charpath currentpoint
        4 index setmatrix stroke
        }ifelse
    grestore
    moveto
    2 copy rmoveto
    } exch cshow
6 npop
} def
/sp
{
    {
    2 npop (0) exch
    2 copy 0 exch put pop
    false charpath
    2 copy rmoveto
    } exch cshow
2 npop
} def
/jsp
{
    {
    2 npop
    (0) exch 2 copy 0 exch put
    _sp eq
        {
        exch 5 index 5 index 5 index 5 -1 roll widthshow
        }
        {
        false charpath
        }ifelse
    2 copy rmoveto
    } exch cshow
5 npop
} def
/pl
{
transform
0.25 sub round 0.25 add exch
0.25 sub round 0.25 add exch
itransform
} def
/setstrokeadjust where
    {
    pop true setstrokeadjust
    /c
    {
    curveto
    } def
    /C
    /c load def
    /v
    {
    currentpoint 6 2 roll curveto
    } def
    /V
    /v load def
    /y
    {
    2 copy curveto
    } def
    /Y
    /y load def
    /l
    {
    lineto
    } def
    /L
    /l load def
    /m
    {
    moveto
    } def
    }
    {
    /c
    {
    pl curveto
    } def
    /C
    /c load def
    /v
    {
    currentpoint 6 2 roll pl curveto
    } def
    /V
    /v load def
    /y
    {
    pl 2 copy curveto
    } def
    /Y
    /y load def
    /l
    {
    pl lineto
    } def
    /L
    /l load def
    /m
    {
    pl moveto
    } def
    } ifelse
/d
{
setdash
} def
/cf    {} def
/i
{
dup 0 eq
    {
    pop cf
    } if
setflat
} def
/j
{
setlinejoin
} def
/J
{
setlinecap
} def
/M
{
setmiterlimit
} def
/w
{
setlinewidth
} def
/H
{} def
/h
{
closepath
} def
/N
{
_pola 0 eq
    {
    _doClip 1 eq {clip /_doClip 0 ddef} if
    newpath
    }
    {
    /CRender {N} ddef
    }ifelse
} def
/n
{N} def
/F
{
_pola 0 eq
    {
    _doClip 1 eq
        {
        gsave _pf grestore clip newpath /_lp /none ddef _fc
        /_doClip 0 ddef
        }
        {
        _pf
        }ifelse
    }
    {
    /CRender {F} ddef
    }ifelse
} def
/f
{
closepath
F
} def
/S
{
_pola 0 eq
    {
    _doClip 1 eq
        {
        gsave _ps grestore clip newpath /_lp /none ddef _sc
        /_doClip 0 ddef
        }
        {
        _ps
        }ifelse
    }
    {
    /CRender {S} ddef
    }ifelse
} def
/s
{
closepath
S
} def
/B
{
_pola 0 eq
    {
    _doClip 1 eq
    gsave F grestore
        {
        gsave S grestore clip newpath /_lp /none ddef _sc
        /_doClip 0 ddef
        }
        {
        S
        }ifelse
    }
    {
    /CRender {B} ddef
    }ifelse
} def
/b
{
closepath
B
} def
/W
{
/_doClip 1 ddef
} def
/*
{
count 0 ne
    {
    dup type (stringtype) eq {pop} if
    } if
_pola 0 eq {newpath} if
} def
/u
{} def
/U
{} def
/q
{
_pola 0 eq {gsave} if
} def
/Q
{
_pola 0 eq {grestore} if
} def
/*u
{
_pola 1 add /_pola exch ddef
} def
/*U
{
_pola 1 sub /_pola exch ddef
_pola 0 eq {CRender} if
} def
/D
{pop} def
/*w
{} def
/*W
{} def
/`
{
/_i save ddef
6 1 roll 4 npop
concat pop
userdict begin
/showpage {} def
0 setgray
0 setlinecap
1 setlinewidth
0 setlinejoin
10 setmiterlimit
[] 0 setdash
/setstrokeadjust where {pop false setstrokeadjust} if
newpath
0 setgray
false setoverprint
} def
/~
{
end
_i restore
} def
/@
{} def
/&
{} def
/O
{
0 ne
/_of exch ddef
/_lp /none ddef
} def
/R
{
0 ne
/_os exch ddef
/_lp /none ddef
} def
/g
{
/_gf exch ddef
/_fc
{
_lp /fill ne
    {
    _of setoverprint
    _gf setgray
    /_lp /fill ddef
    } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
ashow
} ddef
/_pjsf
{
_fc
awidthshow
} ddef
/_lp /none ddef
} def
/G
{
/_gs exch ddef
/_sc
{
_lp /stroke ne
    {
    _os setoverprint
    _gs setgray
    /_lp /stroke ddef
    } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_pjss
{
_sc
jss
} ddef
/_lp /none ddef
} def
/k
{
_cf astore pop
/_fc
{
_lp /fill ne
    {
    _of setoverprint
    _cf aload pop setcmykcolor
    /_lp /fill ddef
    } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
ashow
} ddef
/_pjsf
{
_fc
awidthshow
} ddef
/_lp /none ddef
} def
/K
{
_cs astore pop
/_sc
{
_lp /stroke ne
    {
    _os setoverprint
    _cs aload pop setcmykcolor
    /_lp /stroke ddef
    } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_pjss
{
_sc
jss
} ddef
/_lp /none ddef
} def
/x
{
/_gf exch ddef
findcmykcustomcolor
/_if exch ddef
/_fc
{
_lp /fill ne
    {
    _of setoverprint
    _if _gf 1 exch sub setcustomcolor
    /_lp /fill ddef
    } if
} ddef
/_pf
{
_fc
fill
} ddef
/_psf
{
_fc
ashow
} ddef
/_pjsf
{
_fc
awidthshow
} ddef
/_lp /none ddef
} def
/X
{
/_gs exch ddef
findcmykcustomcolor
/_is exch ddef
/_sc
{
_lp /stroke ne
    {
    _os setoverprint
    _is _gs 1 exch sub setcustomcolor
    /_lp /stroke ddef
    } if
} ddef
/_ps
{
_sc
stroke
} ddef
/_pss
{
_sc
ss
} ddef
/_pjss
{
_sc
jss
} ddef
/_lp /none ddef
} def
/dp
{
dup null eq
{
pop
_dp 0 ne
    {
    0 1 _dp 1 sub _dl mod
        {
        _da exch get 3 get
        } for
    _dp 1 sub _dl mod 1 add packedarray
    _da 0 get aload pop 8 -1 roll 5 -1 roll pop 4 1 roll
    definepattern pop
    } if
}
{
_dp 0 ne _dp _dl mod 0 eq and
    {
    null dp
    } if
7 packedarray _da exch _dp _dl mod exch put
_dp _dl mod _da 0 get 4 get 2 packedarray
/_dp _dp 1 add def
} ifelse
} def
/E
{
_ed begin
dup 0 get type /arraytype ne
    {
    0
        {
        dup 1 add index type /arraytype eq
            {
            1 add
            }
            {
            exit
            } ifelse
        } loop
    array astore
    } if
/_dd exch def
/_ury exch def
/_urx exch def
/_lly exch def
/_llx exch def
/_n exch def
/_y 0 def
/_dl 4 def
/_dp 0 def
/_da _dl array def
0 1 _dd length 1 sub
    {
    /_d exch _dd exch get def
    0 2 _d length 2 sub
        {
        /_x exch def
        /_c _d _x get _ ne def
        /_r _d _x 1 add get cvlit def
        _r _ ne
            {
            _urx _llx sub _ury _lly sub [1 0 0 1 0 0]
                [
                /save cvx
                _llx neg _lly neg /translate cvx
                _c
                    {
                    nc /begin cvx
                    } if
                _r dup type /stringtype eq
                    {
                    cvx
                    }
                    {
                    {exec} /forall cvx
                    } ifelse
                _c
                    {
                    /end cvx
                    } if
                /restore cvx
                ] cvx
            /_fn 12 _n length add string def
            _y _fn cvs pop
            /_y _y 1 add def
            _fn 12 _n putinterval
            _fn _c false dp
            _d exch _x 1 add exch put
            } if
        } for
    } for
null dp
_n _dd /_pd
end xput
} def
/fc
{
_fm dup concatmatrix pop
} def
/p
{
/_fm exch ddef
9 -2 roll _pm translate fc
7 -2 roll _pm scale fc
5 -1 roll _pm rotate fc
4 -2 roll exch 0 ne
    {
    dup _pm rotate fc
    1 -1 _pm scale fc
    neg _pm rotate fc
    }
    {
    pop
    } ifelse
dup _pm rotate fc
exch dup sin exch cos div 1 0 0 1 0 6 2 roll
_pm astore fc
neg _pm rotate fc
_pd exch get /_fdd exch ddef
/_pf
{
save
/_doClip 0 ddef
0 1 _fdd length 1 sub
    {
    /_fd exch _fdd exch get ddef
    _fd
    0 2 _fd length 2 sub
        {
        gsave
        2 copy get dup _ ne
            {
            cvx exec _fc
            }
            {
            pop
            } ifelse
        2 copy 1 add get dup _ ne
            {
            aload pop findfont _fm
            patternfill
            }
            {
            pop
            fill
            } ifelse
        grestore
        pop
        } for
    pop
    } for
restore
newpath
} ddef
/_psf
{
save
/_doClip 0 ddef
0 1 _fdd length 1 sub
    {
    /_fd exch _fdd exch get ddef
    _fd
    0 2 _fd length 2 sub
        {
        gsave
        2 copy get dup _ ne
            {
            cvx exec _fc
            }
            {
            pop
            } ifelse
        2 copy 1 add get dup _ ne
            {
            aload pop findfont _fm
            9 copy 6 npop patternashow
            }
            {
            pop
            6 copy 3 npop ashow
            } ifelse
        grestore
        pop
        } for
    pop
    } for
restore
%3 npop newpath
sw rmoveto
} ddef
/_pjsf
{
save
/_doClip 0 ddef
0 1 _fdd length 1 sub
    {
    /_fd exch _fdd exch get ddef
    _fd
    0 2 _fd length 2 sub
        {
        gsave
        2 copy get dup _ ne
            {
            cvx exec _fc
            }
            {
            pop
            } ifelse
        2 copy 1 add get dup _ ne
            {
            aload pop findfont _fm
            12 copy 6 npop patternawidthshow
            }
            {
            pop 9 copy 3 npop awidthshow
            } ifelse
        grestore
        pop
        } for
    pop
    } for
restore
swj rmoveto
} ddef
/_lp /none ddef
} def
/sc
{
_sm dup concatmatrix pop
} def
/P
{
/_sm exch ddef
9 -2 roll _pm translate sc
7 -2 roll _pm scale sc
5 -1 roll _pm rotate sc
4 -2 roll exch 0 ne
    {
    dup _pm rotate sc
    1 -1 _pm scale sc
    neg _pm rotate sc
    }
    {
    pop
    } ifelse
dup _pm rotate sc
exch dup sin exch cos div 1 0 0 1 0 6 2 roll
_pm astore sc
neg _pm rotate sc
_pd exch get /_sdd exch ddef
/_ps
{
save
/_doClip 0 ddef
0 1 _sdd length 1 sub
    {
    /_sd exch _sdd exch get ddef
    _sd
    0 2 _sd length 2 sub
        {
        gsave
        2 copy get dup _ ne
            {
            cvx exec _sc
            }
            {
            pop
            } ifelse
        2 copy 1 add get dup _ ne
            {
            aload pop findfont _sm
            patternstroke
            }
            {
            pop stroke
            } ifelse
        grestore
        pop
        } for
    pop
    } for
restore
newpath
} ddef
/_pss
{
save
/_doClip 0 ddef
0 1 _sdd length 1 sub
    {
    /_sd exch _sdd exch get ddef
    _sd
    0 2 _sd length 2 sub
        {
        gsave
        2 copy get dup _ ne
            {
            cvx exec _sc
            }
            {
            pop
            } ifelse
        2 copy 1 add get dup _ ne
            {
            aload pop findfont _sm
            10 copy 6 npop patternashowstroke
            }
            {
            pop 7 copy 3 npop ss
            } ifelse
        grestore
        pop
        } for
    pop
    } for
restore
pop sw rmoveto
} ddef
/_pjss
{
save
/_doClip 0 ddef
0 1 _sdd length 1 sub
    {
    /_sd exch _sdd exch get ddef
    _sd
    0 2 _sd length 2 sub
        {
        gsave
        2 copy get dup _ ne
            {
            cvx exec _sc
            }
            {
            pop
            } ifelse
        2 copy 1 add get dup _ ne
            {
            aload pop findfont _sm
            13 copy 6 npop patternawidthshowstroke
            }
            {
            pop 10 copy 3 npop jss
            } ifelse
        grestore
        pop
        } for
    pop
    } for
restore
pop swj rmoveto
} ddef
/_lp /none ddef
} def
/A
{
pop
} def
/nc 3 dict def
nc begin
/setgray
{
pop
} bind def
/setcmykcolor
{
4 npop
} bind def
/setcustomcolor
{
2 npop
} bind def
currentdict readonly pop end
currentdict readonly pop end
setpacking
/annotatepage
{
} def
/imagetemp 5 dict def
imagetemp begin
    currentpacking false setpacking
    /3 {
    ORIG_PROC exec
    dup /str exch def
    length /len exch def
    0 3 len 1 sub {
        /idx exch def
        str idx get str idx 1 add get str i dx 2 add get
        add add 3 idiv
        str idx 3 idiv 3 -1 roll put
    } for
    str 0 len 3 idiv getinterval
    } def
    /4 {
    } bind def
    setpacking
end
/colorimage where { pop }{
     /colorimage {
        dup 3 eq 1 index 4 eq or not {
            systemdict /colorimage get error
        }{
        exch pop
        /buff load length 1 index mul string /buff exch store
        imagetemp begin
            ( ) cvs load
            exch 2 copy 0 exch put pop
            image
        end
        } ifelse
    } bind def
} ifelse
/XIdict 15 dict def
/*realimageoperator systemdict /image get def
/*realimagemaskoperator systemdict /imagemask get def
/XI
{
    XIdict begin
        /saveobj save def
        /mask exch def
        /binary exch def
        /separating exch def
        /platecode exch def
        /colorPlanes exch def
        /bitsperpixel mask 0 eq { exch def }{ pop true } ifelse
        /imageHeight exch def
        /imageWidth exch def
        pop pop pop pop
        /imageMatrix exch def
        /dataproc binary 0 ne { /readstring }{ /readhexstring } ifelse load def
        /buff imageWidth string def
        0 0 moveto imageMatrix concat
        imageWidth imageHeight
        2 copy scale
        bitsperpixel
        [ imageWidth 0 0 imageHeight neg 0 0 ]
        { currentfile buff dataproc pop }
        separating 1 eq {
            /goproc
            mask 0 eq {{*realimageoperator}} {{*realimagemaskoperator}} ifelse
            def
        }{
            /goproc
            mask 0 eq {{ false colorPlanes colorimage}} {{*realimagemaskoperator}} ifelse
            def
        } ifelse
        binary 1 eq { currentfile 128 string readline pop pop } if
        goproc
        saveobj restore
    end
} def
%%EndResource